﻿Public Class StationModel
    Private _id As String
    Public Property Id() As String
        Get
            Return _id
        End Get
        Set(ByVal value As String)
            _id = value
        End Set
    End Property

    Public ReadOnly Property Kind() As StationKind
        Get
            If Me.Id.StartsWith("ch") Then
                Return StationKind.Channel
            ElseIf Me.Id.StartsWith("co") Then
                Return StationKind.Community
            Else
                Return StationKind.None
            End If
        End Get
    End Property

    Private _name As String
    Public Property Name() As String
        Get
            Return _name
        End Get
        Set(ByVal value As String)
            _name = value
        End Set
    End Property
End Class
